/ Komputer for Alle 2001 #9 / CD 9 (Black) - 2001.iso / Pinball / System / BotPack.u / ScriptText21.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 43 15 63 6c 61 73 73 20 |........|C.class |
|00000010| 46 61 64 65 53 68 61 64 | 6f 77 20 65 78 70 61 6e |FadeShad|ow expan|
|00000020| 64 73 20 44 65 63 61 6c | 3b 0d 0a 0d 0a 23 65 78 |ds Decal|;....#ex|
|00000030| 65 63 20 54 45 58 54 55 | 52 45 20 49 4d 50 4f 52 |ec TEXTU|RE IMPOR|
|00000040| 54 20 4e 41 4d 45 3d 66 | 73 68 61 64 6f 77 20 46 |T NAME=f|shadow F|
|00000050| 49 4c 45 3d 54 45 58 54 | 55 52 45 53 5c 44 45 43 |ILE=TEXT|URES\DEC|
|00000060| 41 4c 53 5c 73 68 61 64 | 6f 77 5f 32 2e 50 43 58 |ALS\shad|ow_2.PCX|
|00000070| 20 4c 4f 44 53 45 54 3d | 32 20 41 4c 50 48 41 54 | LODSET=|2 ALPHAT|
|00000080| 52 49 43 4b 3d 31 0d 0a | 0d 0a 76 61 72 20 41 63 |RICK=1..|..var Ac|
|00000090| 74 6f 72 20 4c 69 67 68 | 74 53 6f 75 72 63 65 3b |tor Ligh|tSource;|
|000000a0| 0d 0a 76 61 72 20 56 65 | 63 74 6f 72 20 4f 6c 64 |..var Ve|ctor Old|
|000000b0| 4f 77 6e 65 72 4c 6f 63 | 61 74 69 6f 6e 3b 0d 0a |OwnerLoc|ation;..|
|000000c0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 41 74 74 61 63 |..functi|on Attac|
|000000d0| 68 54 6f 53 75 72 66 61 | 63 65 28 29 0d 0a 7b 0d |hToSurfa|ce()..{.|
|000000e0| 0a 7d 0d 0a 09 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |.}.....f|unction |
|000000f0| 44 65 73 74 72 6f 79 65 | 64 28 29 0d 0a 7b 0d 0a |Destroye|d()..{..|
|00000100| 09 53 75 70 65 72 2e 44 | 65 73 74 72 6f 79 65 64 |.Super.D|estroyed|
|00000110| 28 29 3b 0d 0a 09 0d 0a | 09 2f 2f 69 66 20 28 20 |();.....|.//if ( |
|00000120| 50 6c 61 79 65 72 53 68 | 61 64 6f 77 28 4f 77 6e |PlayerSh|adow(Own|
|00000130| 65 72 29 20 21 3d 20 4e | 6f 6e 65 20 29 0d 0a 09 |er) != N|one )...|
|00000140| 2f 2f 09 50 6c 61 79 65 | 72 53 68 61 64 6f 77 28 |//.Playe|rShadow(|
|00000150| 4f 77 6e 65 72 29 2e 46 | 61 64 65 53 68 61 64 6f |Owner).F|adeShado|
|00000160| 77 20 3d 20 4e 6f 6e 65 | 3b 0d 0a 7d 0d 0a 09 09 |w = None|;..}....|
|00000170| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 54 69 63 6b 28 |..functi|on Tick(|
|00000180| 66 6c 6f 61 74 20 44 65 | 6c 74 61 54 69 6d 65 29 |float De|ltaTime)|
|00000190| 0d 0a 7b 0d 0a 09 6c 6f | 63 61 6c 20 41 63 74 6f |..{...lo|cal Acto|
|000001a0| 72 20 48 69 74 41 63 74 | 6f 72 3b 0d 0a 09 6c 6f |r HitAct|or;...lo|
|000001b0| 63 61 6c 20 56 65 63 74 | 6f 72 20 48 69 74 4e 6f |cal Vect|or HitNo|
|000001c0| 72 6d 61 6c 2c 48 69 74 | 4c 6f 63 61 74 69 6f 6e |rmal,Hit|Location|
|000001d0| 2c 20 53 68 61 64 6f 77 | 53 74 61 72 74 2c 20 53 |, Shadow|Start, S|
|000001e0| 68 61 64 6f 77 44 69 72 | 3b 0d 0a 0d 0a 09 69 66 |hadowDir|;.....if|
|000001f0| 20 28 20 28 4f 77 6e 65 | 72 20 3d 3d 20 4e 6f 6e | ( (Owne|r == Non|
|00000200| 65 29 20 7c 7c 20 28 4f | 77 6e 65 72 2e 4f 77 6e |e) || (O|wner.Own|
|00000210| 65 72 20 3d 3d 20 4e 6f | 6e 65 29 20 29 0d 0a 09 |er == No|ne) )...|
|00000220| 7b 0d 0a 09 09 44 65 73 | 74 72 6f 79 28 29 3b 0d |{....Des|troy();.|
|00000230| 0a 09 09 72 65 74 75 72 | 6e 3b 0d 0a 09 7d 0d 0a |...retur|n;...}..|
|00000240| 0d 0a 09 53 63 61 6c 65 | 47 6c 6f 77 20 2d 3d 20 |...Scale|Glow -= |
|00000250| 44 65 6c 74 61 54 69 6d | 65 3b 0d 0a 0d 0a 09 69 |DeltaTim|e;.....i|
|00000260| 66 20 28 20 4f 6c 64 4f | 77 6e 65 72 4c 6f 63 61 |f ( OldO|wnerLoca|
|00000270| 74 69 6f 6e 20 3d 3d 20 | 4f 77 6e 65 72 2e 4f 77 |tion == |Owner.Ow|
|00000280| 6e 65 72 2e 4c 6f 63 61 | 74 69 6f 6e 20 29 0d 0a |ner.Loca|tion )..|
|00000290| 09 09 72 65 74 75 72 6e | 3b 0d 0a 09 4f 6c 64 4f |..return|;...OldO|
|000002a0| 77 6e 65 72 4c 6f 63 61 | 74 69 6f 6e 20 3d 20 4f |wnerLoca|tion = O|
|000002b0| 77 6e 65 72 2e 4f 77 6e | 65 72 2e 4c 6f 63 61 74 |wner.Own|er.Locat|
|000002c0| 69 6f 6e 3b 0d 0a 0d 0a | 09 44 65 74 61 63 68 44 |ion;....|.DetachD|
|000002d0| 65 63 61 6c 28 29 3b 0d | 0a 0d 0a 09 69 66 20 28 |ecal();.|....if (|
|000002e0| 20 4f 77 6e 65 72 2e 4f | 77 6e 65 72 2e 62 48 69 | Owner.O|wner.bHi|
|000002f0| 64 64 65 6e 20 7c 7c 20 | 28 4f 77 6e 65 72 2e 4f |dden || |(Owner.O|
|00000300| 77 6e 65 72 2e 4d 65 73 | 68 20 3d 3d 20 4e 6f 6e |wner.Mes|h == Non|
|00000310| 65 29 20 29 0d 0a 09 7b | 0d 0a 09 09 44 65 73 74 |e) )...{|....Dest|
|00000320| 72 6f 79 28 29 3b 0d 0a | 09 09 72 65 74 75 72 6e |roy();..|..return|
|00000330| 3b 0d 0a 09 7d 0d 0a 0d | 0a 09 69 66 20 28 20 53 |;...}...|..if ( S|
|00000340| 63 61 6c 65 47 6c 6f 77 | 20 3c 20 30 2e 30 35 20 |caleGlow| < 0.05 |
|00000350| 29 0d 0a 09 7b 0d 0a 09 | 09 44 65 73 74 72 6f 79 |)...{...|.Destroy|
|00000360| 28 29 3b 0d 0a 09 09 72 | 65 74 75 72 6e 3b 0d 0a |();....r|eturn;..|
|00000370| 09 7d 0d 0a 09 69 66 20 | 28 20 4c 69 67 68 74 53 |.}...if |( LightS|
|00000380| 6f 75 72 63 65 20 3d 3d | 20 4e 6f 6e 65 20 29 0d |ource ==| None ).|
|00000390| 0a 09 09 72 65 74 75 72 | 6e 3b 0d 0a 0d 0a 09 53 |...retur|n;.....S|
|000003a0| 68 61 64 6f 77 44 69 72 | 20 3d 20 4e 6f 72 6d 61 |hadowDir| = Norma|
|000003b0| 6c 28 4f 77 6e 65 72 2e | 4f 77 6e 65 72 2e 4c 6f |l(Owner.|Owner.Lo|
|000003c0| 63 61 74 69 6f 6e 20 2d | 20 4c 69 67 68 74 53 6f |cation -| LightSo|
|000003d0| 75 72 63 65 2e 4c 6f 63 | 61 74 69 6f 6e 29 3b 0d |urce.Loc|ation);.|
|000003e0| 0a 0d 0a 09 69 66 20 28 | 20 53 68 61 64 6f 77 44 |....if (| ShadowD|
|000003f0| 69 72 2e 5a 20 3e 20 30 | 20 29 0d 0a 09 09 53 68 |ir.Z > 0| )....Sh|
|00000400| 61 64 6f 77 44 69 72 2e | 5a 20 2a 3d 20 2d 31 3b |adowDir.|Z *= -1;|
|00000410| 0d 0a 0d 0a 09 53 68 61 | 64 6f 77 53 74 61 72 74 |.....Sha|dowStart|
|00000420| 20 3d 20 4f 77 6e 65 72 | 2e 4f 77 6e 65 72 2e 4c | = Owner|.Owner.L|
|00000430| 6f 63 61 74 69 6f 6e 20 | 2b 20 4f 77 6e 65 72 2e |ocation |+ Owner.|
|00000440| 4f 77 6e 65 72 2e 43 6f | 6c 6c 69 73 69 6f 6e 52 |Owner.Co|llisionR|
|00000450| 61 64 69 75 73 20 2a 20 | 53 68 61 64 6f 77 44 69 |adius * |ShadowDi|
|00000460| 72 3b 0d 0a 09 48 69 74 | 41 63 74 6f 72 20 3d 20 |r;...Hit|Actor = |
|00000470| 54 72 61 63 65 28 48 69 | 74 4c 6f 63 61 74 69 6f |Trace(Hi|tLocatio|
|00000480| 6e 2c 20 48 69 74 4e 6f | 72 6d 61 6c 2c 20 53 68 |n, HitNo|rmal, Sh|
|00000490| 61 64 6f 77 53 74 61 72 | 74 20 2d 20 76 65 63 74 |adowStar|t - vect|
|000004a0| 28 30 2c 30 2c 33 30 30 | 29 2c 20 53 68 61 64 6f |(0,0,300|), Shado|
|000004b0| 77 53 74 61 72 74 2c 20 | 66 61 6c 73 65 29 3b 0d |wStart, |false);.|
|000004c0| 0a 0d 0a 09 69 66 20 28 | 20 48 69 74 41 63 74 6f |....if (| HitActo|
|000004d0| 72 20 3d 3d 20 4e 6f 6e | 65 20 29 0d 0a 09 09 72 |r == Non|e )....r|
|000004e0| 65 74 75 72 6e 3b 0d 0a | 0d 0a 09 53 65 74 4c 6f |eturn;..|...SetLo|
|000004f0| 63 61 74 69 6f 6e 28 48 | 69 74 4c 6f 63 61 74 69 |cation(H|itLocati|
|00000500| 6f 6e 29 3b 0d 0a 09 53 | 65 74 52 6f 74 61 74 69 |on);...S|etRotati|
|00000510| 6f 6e 28 72 6f 74 61 74 | 6f 72 28 48 69 74 4e 6f |on(rotat|or(HitNo|
|00000520| 72 6d 61 6c 29 29 3b 0d | 0a 09 41 74 74 61 63 68 |rmal));.|..Attach|
|00000530| 44 65 63 61 6c 28 31 30 | 2c 20 53 68 61 64 6f 77 |Decal(10|, Shadow|
|00000540| 44 69 72 29 3b 0d 0a 7d | 0d 0a 0d 0a 00          |Dir);..}|.....   |
+--------+-------------------------+-------------------------+--------+--------+